object frmUtil: TfrmUtil Left = 205 Top = 51 Width = 415 Height = 383 Caption = 'Sol Jur�dico - Manuten��o' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Position = poScreenCenter OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 14 object Panel1: TPanel Left = 0 Top = 0 Width = 407 Height = 56 Align = alTop TabOrder = 0 object Label1: TLabel Left = 2 Top = 16 Width = 402 Height = 24 Alignment = taCenter AutoSize = False Caption = 'Reorganiza��o, C�pia e Restaura��o dos dados' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end end object Panel2: TPanel Left = 0 Top = 292 Width = 407 Height = 39 Align = alClient TabOrder = 1 object btnSai: TBitBtn Left = 313 Top = 7 Width = 75 Height = 25 Caption = 'Sair' TabOrder = 1 OnClick = btnSaiClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333330333333 333333333F333333333333330033333333333333FF33333333333330B0333333 3333333F8F3333333333330BB0333333333333F88F333333333300BBB0000000 0333FF888FFFFFFFF33330BBB033033333333F888F33F333333330BB00330333 34333F88FF33F3333F3330BBB033033344333F888F33F333FF3330BBB0330334 44443F888F33F33FFFFF30BBB033034444443F888F33F3FFFFFF30BBB0330334 44443F888F33F33FFFFF30BB0333033344333F88F333F333FF3330B033330333 34333F8F3333F3333F3330033333033333333FF33333F3333333300000000333 33333FFFFFFFF333333333333333333333333333333333333333} NumGlyphs = 2 end object btnExecuta: TBitBtn Left = 34 Top = 8 Width = 79 Height = 25 Caption = 'Executar' TabOrder = 0 OnClick = btnExecutaClick end end object Panel3: TPanel Left = 0 Top = 56 Width = 407 Height = 236 Align = alTop TabOrder = 2 object rgpOper: TRadioGroup Left = 110 Top = 35 Width = 188 Height = 112 Caption = 'Selecione a Opera��o desejada ' ItemIndex = 0 Items.Strings = ( 'Reorganizar Tabelas' 'Gerar C�pia de Seguran�a' 'Restaurar C�pia de Seguran�a') TabOrder = 0 end object Panel4: TPanel Left = 69 Top = 166 Width = 270 Height = 52 TabOrder = 1 Visible = False object lbOper: TLabel Left = 3 Top = 4 Width = 265 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Organizando...' end object progressbar1: TProgressBar Left = 14 Top = 23 Width = 242 Height = 19 Min = 0 Max = 100 TabOrder = 0 end end object FilesLb: TListBox Left = 305 Top = 87 Width = 97 Height = 73 BorderStyle = bsNone Ctl3D = False ItemHeight = 16 MultiSelect = True ParentCtl3D = False Sorted = True Style = lbOwnerDrawFixed TabOrder = 2 Visible = False end end object StatusPn: TPanel Left = 0 Top = 331 Width = 407 Height = 25 Align = alBottom BorderWidth = 3 TabOrder = 3 object Bevel1: TBevel Left = 4 Top = 4 Width = 395 Height = 17 Align = alClient end object StatusLb: TLabel Left = 8 Top = 6 Width = 279 Height = 13 Caption = ' ' + ' ' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False end object HintLb: TLabel Left = 8 Top = 6 Width = 3 Height = 13 Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object SpacePn: TPanel Left = 399 Top = 4 Width = 4 Height = 17 Align = alRight BevelOuter = bvNone Caption = ' ' TabOrder = 0 end end object tblprocesso: TTable DatabaseName = 'soljur' TableName = 'Processo.DB' Left = 46 Top = 104 end object tblcontra: TTable DatabaseName = 'soljur' TableName = 'contra.db' Left = 224 Top = 32 end object tblusuario: TTable DatabaseName = 'soljur' TableName = 'Usuario.DB' Left = 311 Top = 102 end object tbladvcontra: TTable DatabaseName = 'soljur' TableName = 'AdvContr.db' Left = 8 Top = 31 end object tblnatureza: TTable DatabaseName = 'soljur' TableName = 'Natureza.DB' Left = 289 Top = 56 end object tblassunto: TTable DatabaseName = 'soljur' TableName = 'Assunto.DB' Left = 115 Top = 32 end object tblforum: TTable DatabaseName = 'soljur' TableName = 'Forum.DB' Left = 9 Top = 62 end object tblrito: TTable DatabaseName = 'soljur' TableName = 'Rito.DB' Left = 81 Top = 104 end object tblvara: TTable DatabaseName = 'soljur' TableName = 'Vara.DB' Left = 346 Top = 101 end object tblpessoa: TTable DatabaseName = 'soljur' TableName = 'Pessoa.DB' Left = 324 Top = 57 end object tblprocaux: TTable DatabaseName = 'soljur' TableName = 'ProcAux.DB' Left = 370 Top = 57 end object TblAgenda: TTable DatabaseName = 'soljur' TableName = 'Agenda.DB' Left = 44 Top = 32 end object TblProcedim: TTable DatabaseName = 'soljur' TableName = 'Procedim.DB' Left = 6 Top = 104 end object TblFisica: TTable DatabaseName = 'soljur' TableName = 'Fisica.DB' Left = 372 Top = 31 end object TblJuridica: TTable DatabaseName = 'soljur' TableName = 'Juridica.DB' Left = 190 Top = 60 end object TblArea: TTable DatabaseName = 'soljur' TableName = 'area.db' Left = 81 Top = 32 end object tblConfig: TTable AfterPost = tblConfigAfterPost AfterCancel = tblConfigAfterCancel DatabaseName = 'soljur' TableName = 'Config.DB' Left = 190 Top = 32 end object TblHonora: TTable DatabaseName = 'soljur' TableName = 'Honora.DB' Left = 44 Top = 60 end object TblLanc: TTable DatabaseName = 'soljur' TableName = 'Lancamen.DB' Left = 224 Top = 59 end object TblIndiceD: TTable DatabaseName = 'soljur' TableName = 'IndiceD.db' Left = 116 Top = 60 end object TblIndiceM: TTable DatabaseName = 'soljur' TableName = 'IndiceM.DB' Left = 154 Top = 60 end object TblIndice: TTable Filtered = True DatabaseName = 'SOLJUR' TableName = 'Indice.DB' Left = 80 Top = 60 end object TblLogTrans: TTable DatabaseName = 'SOLJUR' TableName = 'LogTrans.db' Left = 257 Top = 58 end object TblCorreio: TTable DatabaseName = 'SOLJUR' TableName = 'Correio.DB' Left = 256 Top = 32 end object TblAtalho: TTable DatabaseName = 'SOLJUR' TableName = 'Atalho.DB' Left = 152 Top = 32 end object TblEtiqueta: TTable DatabaseName = 'SOLJUR' TableName = 'Etiqueta.DB' Left = 292 Top = 32 end object TblFeriado: TTable DatabaseName = 'SOLJUR' TableName = 'Feriado.db' Left = 330 Top = 30 end object tblEstados: TTable DatabaseName = 'SolJur' TableName = 'Estados.db' Left = 282 Top = 5 end object AddFilesDg: TOpenDialog DefaultExt = '*.*' Filter = 'All files (*.*)|*.*' Options = [ofHideReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofNoTestFileCreate] Title = 'Selecione os Arquivos para gera��o de Backup' Left = 8 Top = 232 end object OpenZipDg: TOpenDialog DefaultExt = 'ZIP' Filter = 'Zip file (*.ZIP)|*.ZIP|All files (*.*)|*.*' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Informe a Unidade e o Arquivo Origem' Left = 8 Top = 200 end object NewZipDg: TSaveDialog DefaultExt = 'ZIP' Filter = 'Arquivo Zip (*.ZIP)|*.ZIP|All files (*.*)|*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofCreatePrompt] Title = 'Informe a Unidade e arquivo destino' Left = 8 Top = 168 end object TblApenso: TTable DatabaseName = 'Soljur' TableName = 'Apenso.db' Left = 64 Top = 8 end object TblStatus: TTable DatabaseName = 'Soljur' TableName = 'Status.db' Left = 376 Top = 102 end object MainZip: TXceedZip Compression = 6 MultidiskMode = True StoredExtensions = '.ZIP;.LZH;.ARC;.ARJ;.ZOO' UsePaths = False OnAdding = MainZipAdding OnExtracting = MainZipExtracting OnListing = MainZipListing OnSkippingFile = MainZipSkippingFile OnStatus = MainZipStatus OnNewdisk = MainZipNewdisk Left = 48 Top = 152 end object tblParaChecarRedeOK: TTable DatabaseName = 'Soljur' TableName = 'Config2.DB' Left = 67 Top = 181 end object tblUsuAge: TTable DatabaseName = 'Soljur' TableName = 'USUAGE.db' Left = 292 Top = 140 end object tblDataAge: TTable DatabaseName = 'Soljur' TableName = 'DataAge.db' Left = 320 Top = 140 end object tblProcAnd: TTable DatabaseName = 'Soljur' TableName = 'PROCAND.db' Left = 352 Top = 140 end end